home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / internet / net commander 1.0 / ISP / SCRPTLST / ICSI.CMD < prev    next >
Encoding:
Text File  |  1996-03-05  |  1005 b   |  59 lines
  1. #    Login.cmd for ICSI Internet Connect Services
  2. #
  3. # set up some strings for dialling up
  4. #
  5. if ![load $number]
  6.   if [query $number "Enter your dial up phone number"]
  7.     save $number
  8.   end
  9. end
  10. if ![load $username]
  11.   if [username "Enter your login username"]
  12.     save $username
  13.   end
  14. end
  15. if ![load $password]
  16.   if [password "Enter your login password"]
  17.     save $password
  18.   end
  19. end
  20. $modemsetup = "&cl"
  21. $prompt = "]"
  22. $userprompt = "ogin:"
  23. $passprompt = "assword:"
  24. $slipcmd = "slip"
  25. $addrtarg = ") to "
  26. $pppcmd = "ppp"
  27.  
  28. %attempts = 10
  29. #
  30. #
  31. #----------------------------------------------------------
  32. #
  33. # initialize modem
  34. #
  35. output "atz"\13
  36. if ! [input 10 OK\n]
  37.   display "Modem is not responding"\n
  38.   abort
  39. end
  40. #
  41. # setup our modem commands
  42. #
  43. output "at"$modemsetup\13
  44. input 10 OK\n
  45. #
  46. # 
  47. output "atdt"$number\13
  48. #
  49. #  wait for the username prompt
  50. #
  51. input 30 login:
  52. output $username\13
  53. #
  54. # and the password
  55. #
  56. input 30 assword:
  57. output $password\13
  58. address 30
  59.